home *** CD-ROM | disk | FTP | other *** search
/ Aminet 41 / Aminet 41 (2001)(Schatztruhe)[!][Feb 2001].iso / Aminet / misc / sci / Denise4_2.lha / Denise4_2 / arexx / DeniseAmIRC.amirx next >
Text File  |  2000-11-04  |  1KB  |  47 lines
  1. /* Denise-MYTH ARexx Port For AmIRC */
  2. /*
  3.    Jest to BARDZO PROSTY skrypt sîuûâcy do podîâczenia Denise do AmIRC'a.
  4.    Dziëki niemu Denise ma moûliwoôê rozmowy na kanaîach IRC.
  5.    Skrypt jest jednak bardzo prosty. Gdyby ktoô chciaî napisaê
  6.    skrypt bardziej rozwiniëty, proszë o kontakt.
  7.  
  8.    PODÎÂCZENIE:
  9.    - uruchomiê AmIRC'a (TYLKO JEDEN),
  10.    - wejôê na jakiô kanaî,
  11.    - uruchomiê Denise,
  12.    - uruchomiê skrypt DeniseAmIRC.amirx
  13.      (moûna go uruchomiê z poziomu AmIRC'a lub zewnëtrznie: rx DeniseAmIRC.amirx)
  14.  
  15.    UWAGI:
  16.    - jeôli uruchamiamy kilka AmIRC'ów to naleûy odpowiednio zmieniê
  17.      adresy (address 'AMIRC.1' -> 'AMIRC.2' itp.),
  18.    - wymagane jest uûywanie literek z "ogonkami",
  19.    - nie sâ rozróûniani róûni rozmówcy.
  20. */
  21.  
  22. address 'AMIRC.1'
  23.  
  24. Options Results  /* Enable rc/result return codes */
  25. signal on syntax /* Enables syntax checking       */
  26.  
  27. do forever
  28.  
  29.    address 'AMIRC.1'
  30.  
  31.    "GETLINE"
  32.    "ECHO " line.command
  33.    command=line.rest
  34.  
  35.    "ECHO " command
  36.  
  37.    address 'DENISE-MYTH1'
  38.  
  39.    drop rc
  40.    drop result
  41.    line.rest
  42.  
  43.    address 'AMIRC.1'
  44.    "SAY " result
  45.  
  46. end
  47.